
Public Class E_Envio

    Private mIdEnvio As Integer
    Private mFecha As Date
    Private mRemitente As Integer
    Private mDestinatario As Integer
    Private mMovil As Integer
    Private mTipoDePago As Integer
    Private mTipoDeEnvio As Integer
    Private mImporteEnvio As Decimal
    Private mImporteContrareembolso As Decimal
    Private mCantidadDePaquetes As Integer
    Private mUltimoEstado As Integer

    Public Sub New()

        mIdEnvio = 0
        mFecha = Now()
        mRemitente = 0
        mDestinatario = 0
        mMovil = 0
        mTipoDePago = 0
        mTipoDeEnvio = 0
        mImporteEnvio = 0
        mImporteContrareembolso = 0
        mCantidadDePaquetes = 0
        mUltimoEstado = 0

    End Sub

    Public Property IdEnvio() As Integer
        Get
            Return mIdEnvio
        End Get
        Set(ByVal value As Integer)
            mIdEnvio = value
        End Set
    End Property

    Public Property Fecha()
        Get
            Return mFecha
        End Get
        Set(ByVal value)
            mFecha = value
        End Set
    End Property

    Public Property Remitente()
        Get
            Return mRemitente
        End Get
        Set(ByVal value)
            mRemitente = value
        End Set
    End Property

    Public Property Destinatario()
        Get
            Return mDestinatario
        End Get
        Set(ByVal value)
            mDestinatario = value
        End Set
    End Property

    Public Property Movil()
        Get
            Return mMovil
        End Get
        Set(ByVal value)
            mMovil = value
        End Set
    End Property

    Public Property TipoDePago()
        Get
            Return mTipoDePago
        End Get
        Set(ByVal value)
            mTipoDePago = value
        End Set
    End Property

    Public Property TipoDeEnvio()
        Get
            Return mTipoDeEnvio
        End Get
        Set(ByVal value)
            mTipoDeEnvio = value
        End Set
    End Property

    Public Property ImporteEnvio()
        Get
            Return mImporteEnvio
        End Get
        Set(ByVal value)
            mImporteEnvio = value
        End Set
    End Property

    Public Property ImporteContrareembolso()
        Get
            Return mImporteContrareembolso
        End Get
        Set(ByVal value)
            mImporteContrareembolso = value
        End Set
    End Property

    Public Property CantidadDePaquetes()
        Get
            Return mCantidadDePaquetes
        End Get
        Set(ByVal value)
            mCantidadDePaquetes = value
        End Set
    End Property

    Public Property UltimoEstado()
        Get
            Return mUltimoEstado
        End Get
        Set(ByVal value)
            mUltimoEstado = value
        End Set
    End Property

End Class
